-- card: 28479 from stack: in.4 -- bmap block id: 28834 -- flags: 4000 -- background id: 27702 -- name: Intro Card ----- HyperTalk script ----- on enterKey set hilite of background button "Start" to true set lockScreen to true hide background field "My Name Info" set hilite of background button "Start" to false go to first card of background "Action Items" find the long date in background field ID 9 put number of this card into X if X = number of cards then hide background button "Next" hide background button "Last Card" else show background button "Next" show background button "Last Card" end if if X = 12 then hide background button "Prev" hide background button "First Card" else show background button "Prev" show background button "First Card" end if hide field 3 hide field 4 set lockScreen to false click at 72,109 end enterKey on idle set hilite of background button "Start" to true wait for 1 seconds set hilite of background button "Start" to false end idle -- part 3 (button) -- low flags: 00 -- high flags: A000 -- rect: left=199 top=273 right=328 bottom=296 -- title width / last selected line: 0 -- icon id / first selected line: 17076 / 17076 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Action Items ----- HyperTalk script ----- on mouseUp visual effect iris open go to stack "Action Items" end mouseUp -- part 2 (button) -- low flags: 00 -- high flags: A000 -- rect: left=199 top=273 right=328 bottom=296 -- title width / last selected line: 0 -- icon id / first selected line: 17076 / 17076 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Install on Home Card ----- HyperTalk script ----- on mouseUp answer "Install Action Items button on Home card?" with "OK" or "Cancel" if it is "Cancel" then exit mouseUp end if set lockmessages to true hide button 2 set userLevel to 5 choose button tool click at loc of button 1 doMenu Copy Button show button 2 go home doMenu Paste Button set loc of button "Action Items" to 250,250 answer "Drag Action Items button to desired location" wait until the mouse is down set hilite of button "Action Items" to true repeat until the mouse is up set loc of button "Action Items" to the mouseLoc end repeat set hilite of button "Action Items" to false choose browse tool go back play harpsichord "ee c" set lockmessages to false end mouseUp -- part 4 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=469 top=326 right=342 bottom=512 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 9 -- style flags: 0 -- line height: 12 -- part name: Version# -- part contents for card part 4 ----- text ----- Ver 2.4 -- part contents for background part 5 ----- text ----- Developed and Scripted by Mike Clary Please address comments and recommendations to MClary on GEnie!